object frmTest: TfrmTest Left = 0 Top = 23 HelpContext = 900 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Mekatronik Bilgisayar �evirmeli A� Ba�lant�lar�' ClientHeight = 377 ClientWidth = 634 Color = clTeal Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 6 Top = 33 Width = 129 Height = 34 Caption = 'Se�ilecek �evirmeli A� Ba�lant�lar�' Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False WordWrap = True end object Label2: TLabel Left = 268 Top = 51 Width = 261 Height = 15 Caption = 'Ba�lan�lan �evirmeli A� Ba�lant�lar�n�n Durumu' Font.Color = clWhite Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object lstEntries: TListBox Left = 3 Top = 68 Width = 132 Height = 137 ItemHeight = 13 TabOrder = 3 OnClick = lstEntriesClick end object grpSelectedEntry: TGroupBox Left = 3 Top = 248 Width = 381 Height = 125 Color = clSilver ParentColor = False TabOrder = 11 object lblUserName: TLabel Left = 6 Top = 20 Width = 69 Height = 15 Caption = 'K&ullan�c� Ad�' FocusControl = txtUserName Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object lblPassword: TLabel Left = 37 Top = 54 Width = 37 Height = 15 Caption = 'Par&ola' FocusControl = txtPassword Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object lblAsync: TLabel Left = 101 Top = 74 Width = 134 Height = 15 Caption = 'Async Ba�lant� Stat�s�:' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object lblStatus: TLabel Left = 99 Top = 90 Width = 276 Height = 32 AutoSize = False Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object txtUserName: TEdit Left = 79 Top = 16 Width = 121 Height = 21 TabOrder = 0 OnChange = txtUserNameChange end object txtPassword: TEdit Left = 79 Top = 50 Width = 121 Height = 21 PasswordChar = '*' TabOrder = 1 end object optDialMode: TRadioGroup Left = 4 Top = 78 Width = 90 Height = 44 Caption = 'Ba�lanma Modu' ItemIndex = 1 Items.Strings = ( 'Sync' 'Async') TabOrder = 2 end object btnGetParams: TBitBtn Left = 202 Top = 15 Width = 172 Height = 25 Caption = 'Kullan�c� Ad� ve &Parolay� Getir' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = btnGetParamsClick end object btnSetParams: TBitBtn Left = 202 Top = 48 Width = 172 Height = 25 Caption = 'Kullan�c� Ad� ve Parolay� &Sakla' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = btnSetParamsClick end end object lvConnections: TListView Left = 266 Top = 68 Width = 365 Height = 137 ColumnClick = False Columns = < item Caption = 'Ad�' Width = 6 WidthType = ( -1) end item Caption = 'Ayg�t Tipi' Width = 12 WidthType = ( -1) end item Caption = 'Ayg�t Ad�' Width = 12 WidthType = ( -1) end item Caption = 'Stat�s�' Width = 12 WidthType = ( -1) end> ReadOnly = False HideSelection = False TabOrder = 8 ViewStyle = vsReport end object BtnINTER: TBitBtn Left = 392 Top = 249 Width = 237 Height = 35 Caption = '&Mekatronik �nternet Sitesini A�' Enabled = False Font.Color = clRed Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold, fsUnderline] ParentFont = False TabOrder = 12 OnClick = BtnINTERClick end object BtnBBS: TBitBtn Left = 392 Top = 294 Width = 237 Height = 35 Caption = 'Lokman BBS'#39'e &Giri�' Enabled = False Font.Color = clBlue Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 13 OnClick = BtnBBSClick end object btnGetEntries: TBitBtn Left = 3 Top = 6 Width = 250 Height = 25 Caption = '�evirmeli A� Ba�lant�lar�n� G�ster' Font.Color = clTeal Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnGetEntriesClick end object btnCreateEntry: TBitBtn Left = 141 Top = 70 Width = 121 Height = 25 Caption = 'Y&eni Ba�lant� Ekle' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = btnCreateEntryClick end object btnEditEntry: TBitBtn Left = 141 Top = 107 Width = 121 Height = 25 Caption = 'Ba�lant�y� &De�i�tir' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = btnEditEntryClick end object btnRenameEntry1: TBitBtn Left = 141 Top = 143 Width = 121 Height = 25 Caption = 'Ba�lant� &Ad�n� De�i�' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = btnRenameEntryClick end object btnDeleteEntry: TBitBtn Left = 141 Top = 180 Width = 121 Height = 25 Caption = 'Ba�lant�y� Sil *' Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 7 OnClick = btnDeleteEntryClick end object btnActiveConn: TBitBtn Left = 269 Top = 6 Width = 259 Height = 25 Caption = 'Aktif Ba�lant�lar� S�rala/G�ster' Font.Color = clTeal Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = btnActiveConnClick end object BitBtn3: TBitBtn Left = 544 Top = 6 Width = 85 Height = 25 Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 2 Kind = bkClose end object btnDialEntry: TBitBtn Left = 3 Top = 212 Width = 131 Height = 32 Caption = '&Ba�lan' Font.Color = clRed Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 9 OnClick = btnDialEntryClick end object btnHangup: TBitBtn Left = 255 Top = 212 Width = 130 Height = 32 Caption = 'Ba�la&nt�y� Kes' Enabled = False Font.Color = clRed Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 10 OnClick = btnHangupClick end object BitBtnCIK: TBitBtn Left = 392 Top = 339 Width = 237 Height = 35 Caption = 'Lokman BBS'#39'ten &��k��' Enabled = False Font.Color = clBlue Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 14 OnClick = BitBtnCIKClick end object BitBtn1: TBitBtn Left = 544 Top = 37 Width = 85 Height = 25 HelpContext = 900 Font.Color = clBlue Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 15 Kind = bkHelp end end